home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 2001 May / SGI Freeware 2001 May - Disc 1.iso / dist / fw_teTeX.idb / usr / freeware / bin / mktexmf.z / mktexmf
Text File  |  2001-01-10  |  4KB  |  137 lines
  1. #!/bin/sh
  2. # original mktexmf -- make a new MF file, because one wasn't found.
  3. # 
  4. # (If you change or delete the word `original' on the previous line,
  5. # installation won't write this script over yours.)
  6. # 
  7. # te@informatik.uni-hannover.de, kb@mail.tug.org, and infovore@xs4all.nl.
  8. # Public domain.
  9.  
  10. version='$Id: mktexmf,v 1.21 1999/05/30 18:57:41 olaf Exp $'
  11. progname=`echo $0 | sed 's%.*/%%'`
  12. usage="Usage: $progname FONT.
  13.  
  14. Makes the Metafont source file for FONT, if possible. For example,
  15. \`ecr12' or \`cmr11'."
  16.  
  17. # Common code for all scripts.
  18. : ${MT_TEXMFMAIN=`kpsewhich --expand-path='$TEXMFMAIN'`}
  19. : ${MT_MKTEX_OPT=`kpsewhich --format='web2c files' mktex.opt`}
  20. test -n "$MT_MKTEX_OPT" || MT_MKTEX_OPT="$MT_TEXMFMAIN/web2c/mktex.opt"
  21. if test ! -f "$MT_MKTEX_OPT"; then
  22.   echo "$progname: Cannot find mktex.opt; check your installation." >&2
  23.   exit 1
  24. fi
  25.  
  26. . "$MT_MKTEX_OPT"
  27.  
  28. (
  29. # See comments in mktexpk.
  30. name="`echo $1 | sed 's%.*/%%; s%\.mf$%%'`"
  31. rootname=`echo "$name" | sed 's/[0-9]*$//'`
  32. pointsize=`echo "$name" | sed "s/^$rootname//"`
  33.  
  34. sauterroot=`kpsewhich b-$rootname.mf 2>/dev/null`
  35. if test -n "$sauterroot"; then
  36.   rootfile=$sauterroot
  37.   rootname=b-$rootname
  38. else
  39.   case $rootname in
  40.     cs*|lcsss*|icscsc*|icstt*|ilcsss*)
  41.        rootfile=`kpsewhich cscode.mf`;;
  42.     wn[bcdfirstuv]*|rx[bcdfiorstuvx][bcfhilmostx]|l[abchl][bcdfiorstuvx]*)
  43.        lhprefix=`echo "$name" | sed 's/^\(..\).*/\1/'`
  44.        rootfile=`kpsewhich ${lhprefix}codes.mf 2>/dev/null`;;
  45.     *)
  46.        rootfile=`kpsewhich $rootname.mf 2>/dev/null`;;
  47.   esac
  48. fi
  49. { test -z "$rootfile" || test ! -f "$rootfile"; } && exit 1
  50.  
  51. #if test -z "$MT_MFNAME"; then
  52. OIFS=$IFS; IFS=$SEP
  53. set x `"$MT_MKTEXNAM" $name`; shift
  54. IFS=$OIFS
  55. MT_MFNAME="$3"
  56. #fi
  57.  
  58. destdir=`echo "$MT_MFNAME" | sed 's%/[^/][^/]*$%%'`
  59. test -d "$destdir" || "$MT_MKTEXDIR" "$destdir" || exit 1
  60. cd "$destdir" >/dev/null 2>&1 || exit 1
  61.  
  62. case "$pointsize" in
  63.   "") echo "$progname: no pointsize."; exit 1;;
  64.   11) realsize=10.95;;      # \magstephalf
  65.   14) realsize=14.4;;  # \magstep2
  66.   17) realsize=17.28;; # \magstep3
  67.   20) realsize=20.74;; # \magstep4
  68.   25) realsize=24.88;; # \magstep5
  69.   30) realsize=29.86;; # \magstep6
  70.   36) realsize=35.83;; # \magstep7
  71.         # The new convention is to have three or four letters for the
  72.         # font name and four digits for the pointsize. The number is
  73.         # pointsize * 100. We effectively divide by 100 by ignoring the
  74.         # last two digits.
  75.   ????|?????) realsize=`echo "$pointsize" | sed 's/\(..\)$/.\1/'`;;
  76.   *) realsize="$pointsize";;
  77. esac
  78.  
  79. mfname="$name.mf"
  80. if test -r "$mfname"; then
  81.   echo "$progname: $destdir/$mfname already exists."
  82.   echo "$destdir/$mfname" >$STDOUT
  83.   "$MT_MKTEXUPD" "$destdir" "$mfname"
  84.   exit 0
  85. fi
  86.  
  87. case "$name" in
  88.   ec*|tc*)
  89.     cat > "mf$$.tmp" <<END
  90. if unknown exbase: input exbase fi;
  91. gensize:=$realsize;
  92. generate $rootname;
  93. END
  94.     ;;
  95.   dc*)
  96.     cat > "mf$$.tmp" <<END
  97. if unknown dxbase: input dxbase fi;
  98. gensize:=$realsize;
  99. generate $rootname;
  100. END
  101.     ;;
  102.   cs*|lcsss*|icscsc*|icstt*|ilcsss*)
  103.     cat > "mf$$.tmp" <<END
  104. input cscode
  105. use_driver;
  106. END
  107.     ;;
  108.   wn[bcdfirstuv]*|rx[bcdfiorstuvx][bcfhilmostx]*|l[abchl][bcdfiorstuvx]*)
  109.     cat > "mf$$.tmp" <<END
  110. input fikparm;
  111. END
  112.     ;;
  113.   g[lorst][ijmtwx][cinou]*)
  114.     # A small superset of the names of the cbgreek fonts.
  115.     cat > "mf$$.tmp" <<END
  116. gensize:=$realsize;
  117. input $rootname;
  118. END
  119.     ;;
  120.   *)
  121.     cat > "mf$$.tmp" <<END
  122. design_size := $realsize;
  123. input $rootname;
  124. END
  125.     ;;
  126. esac
  127.  
  128. chmod `kpsestat -xst,go-w .` "mf$$.tmp"
  129. rm -f "$mfname"
  130. mv "mf$$.tmp" "$mfname"
  131.  
  132. echo "$destdir/$mfname" >$STDOUT
  133. echo "$progname: $destdir/$mfname: successfully generated." >&2
  134. "$MT_MKTEXUPD" "$destdir" "$mfname"
  135. exit 0
  136. ) 1>&2 </dev/null
  137.